Filename: /text/sbasic/shared/03130600.xhp

Wait Statement [Runtime]
Wait ステートメント [実行時](hd_id3154136.1)

Interrupts the program execution for the amount of time that you specify in milliseconds.
プログラムの実行に割り込みをかけ、ミリ秒単位の指定時間だけ待機させます。(par_id3149236.2)

Syntax:
構文:(hd_id3143229.3)

Wait millisec
Wait millisec(par_id3150669.4)

Parameters:
パラメータ:(hd_id3148943.5)

millisec: Numeric expression that contains the amount of time (in milliseconds) to wait before the program is executed.
millisec: プログラムの実行中断時間 (ミリ秒) を示す数値表式。(par_id3154924.6)

Example:
例:(hd_id3150541.7)

Sub ExampleWait
Sub ExampleWait(par_id3154138.8)

Dim lTick As Long
Dim lTick As Long(par_id3154367.9)

lTick = GetSystemTicks()
lTick = GetSystemTicks()(par_id3154909.10)

wait 2000
wait 2000(par_id3151042.11)

lTick = (GetSystemTicks() - lTick)
lTick = (GetSystemTicks() - lTick)(par_id3154217.12)

MsgBox "" & lTick & " Ticks" ,0,"The pause lasted"
MsgBox "" & lTick & " Ticks" ,0,"The pause lasted"(par_id3156214.13)

End Sub
End Sub(par_id3148922.14)